/***************************************************************************/
/*                                                                         */
/*  t1driver.c                                                             */
/*                                                                         */
/*    Type 1 driver interface (body).                                      */
/*                                                                         */
/*  Copyright 1996-2001, 2002, 2003, 2004, 2006, 2007, 2009 by             */
/*  David Turner, Robert Wilhelm, and Werner Lemberg.                      */
/*                                                                         */
/*  This file is part of the FreeType project, and may only be used,       */
/*  modified, and distributed under the terms of the FreeType project      */
/*  license, LICENSE.TXT.  By continuing to use, modify, or distribute     */
/*  this file you indicate that you have read the license and              */
/*  understand and accept it fully.                                        */
/*                                                                         */
/***************************************************************************/


#include <ft2build.h>
#include "t1driver.h"
#include "t1gload.h"
#include "t1load.h"

#include "t1errors.h"

#ifndef T1_CONFIG_OPTION_NO_AFM
    #include "t1afm.h"
#endif

#include FT_INTERNAL_DEBUG_H
#include FT_INTERNAL_STREAM_H

#include FT_SERVICE_MULTIPLE_MASTERS_H
#include FT_SERVICE_GLYPH_DICT_H
#include FT_SERVICE_XFREE86_NAME_H
#include FT_SERVICE_POSTSCRIPT_NAME_H
#include FT_SERVICE_POSTSCRIPT_CMAPS_H
#include FT_SERVICE_POSTSCRIPT_INFO_H
#include FT_SERVICE_KERNING_H


/*************************************************************************/
/*                                                                       */
/* The macro FT_COMPONENT is used in trace mode.  It is an implicit      */
/* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log  */
/* messages during execution.                                            */
/*                                                                       */
#undef  FT_COMPONENT
#define FT_COMPONENT trace_t1driver

/*
 *  GLYPH DICT SERVICE
 *
 */

static FT_Error
t1_get_glyph_name(T1_Face face,
                  FT_UInt glyph_index,
                  FT_Pointer buffer,
                  FT_UInt buffer_max)
{
    FT_STRCPYN(buffer, face->type1.glyph_names[glyph_index], buffer_max);

    return T1_Err_Ok;
}


static FT_UInt
t1_get_name_index(T1_Face face,
                  FT_String* glyph_name)
{
    FT_Int i;
    FT_String* gname;


    for (i = 0; i < face->type1.num_glyphs; i++)
    {
        gname = face->type1.glyph_names[i];

        if (!ft_strcmp(glyph_name, gname))
            return (FT_UInt)i;
    }

    return 0;
}


static const FT_Service_GlyphDictRec t1_service_glyph_dict =
{
    (FT_GlyphDict_GetNameFunc)t1_get_glyph_name,
    (FT_GlyphDict_NameIndexFunc)t1_get_name_index
};


/*
 *  POSTSCRIPT NAME SERVICE
 *
 */

static const char*
t1_get_ps_name(T1_Face face)
{
    return (const char*)face->type1.font_name;
}


static const FT_Service_PsFontNameRec t1_service_ps_name =
{
    (FT_PsName_GetFunc)t1_get_ps_name
};


/*
 *  MULTIPLE MASTERS SERVICE
 *
 */

#ifndef T1_CONFIG_OPTION_NO_MM_SUPPORT
static const FT_Service_MultiMastersRec t1_service_multi_masters =
{
    (FT_Get_MM_Func)T1_Get_Multi_Master,
    (FT_Set_MM_Design_Func)T1_Set_MM_Design,
    (FT_Set_MM_Blend_Func)T1_Set_MM_Blend,
    (FT_Get_MM_Var_Func)T1_Get_MM_Var,
    (FT_Set_Var_Design_Func)T1_Set_Var_Design
};
#endif


/*
 *  POSTSCRIPT INFO SERVICE
 *
 */

static FT_Error
t1_ps_get_font_info(FT_Face face,
                    PS_FontInfoRec* afont_info)
{
    *afont_info = ((T1_Face)face)->type1.font_info;

    return T1_Err_Ok;
}


static FT_Error
t1_ps_get_font_extra(FT_Face face,
                     PS_FontExtraRec* afont_extra)
{
    *afont_extra = ((T1_Face)face)->type1.font_extra;

    return T1_Err_Ok;
}


static FT_Int
t1_ps_has_glyph_names(FT_Face face)
{
    FT_UNUSED(face);

    return 1;
}


static FT_Error
t1_ps_get_font_private(FT_Face face,
                       PS_PrivateRec* afont_private)
{
    *afont_private = ((T1_Face)face)->type1.private_dict;

    return T1_Err_Ok;
}


static const FT_Service_PsInfoRec t1_service_ps_info =
{
    (PS_GetFontInfoFunc)t1_ps_get_font_info,
    (PS_GetFontExtraFunc)t1_ps_get_font_extra,
    (PS_HasGlyphNamesFunc)t1_ps_has_glyph_names,
    (PS_GetFontPrivateFunc)t1_ps_get_font_private,
};


#ifndef T1_CONFIG_OPTION_NO_AFM
static const FT_Service_KerningRec t1_service_kerning =
{
    T1_Get_Track_Kerning,
};
#endif


/*
 *  SERVICE LIST
 *
 */

static const FT_ServiceDescRec t1_services[] =
{
    { FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &t1_service_ps_name },
    { FT_SERVICE_ID_GLYPH_DICT, &t1_service_glyph_dict },
    { FT_SERVICE_ID_XF86_NAME, FT_XF86_FORMAT_TYPE_1 },
    { FT_SERVICE_ID_POSTSCRIPT_INFO, &t1_service_ps_info },

    #ifndef T1_CONFIG_OPTION_NO_AFM
    { FT_SERVICE_ID_KERNING, &t1_service_kerning },
    #endif

    #ifndef T1_CONFIG_OPTION_NO_MM_SUPPORT
    { FT_SERVICE_ID_MULTI_MASTERS, &t1_service_multi_masters },
    #endif
    { NULL, NULL }
};


static FT_Module_Interface
Get_Interface(FT_Driver driver,
              const FT_String* t1_interface)
{
    FT_UNUSED(driver);

    return ft_service_list_lookup(t1_services, t1_interface);
}


#ifndef T1_CONFIG_OPTION_NO_AFM

/*************************************************************************/
/*                                                                       */
/* <Function>                                                            */
/*    Get_Kerning                                                        */
/*                                                                       */
/* <Description>                                                         */
/*    A driver method used to return the kerning vector between two      */
/*    glyphs of the same face.                                           */
/*                                                                       */
/* <Input>                                                               */
/*    face        :: A handle to the source face object.                 */
/*                                                                       */
/*    left_glyph  :: The index of the left glyph in the kern pair.       */
/*                                                                       */
/*    right_glyph :: The index of the right glyph in the kern pair.      */
/*                                                                       */
/* <Output>                                                              */
/*    kerning     :: The kerning vector.  This is in font units for      */
/*                   scalable formats, and in pixels for fixed-sizes     */
/*                   formats.                                            */
/*                                                                       */
/* <Return>                                                              */
/*    FreeType error code.  0 means success.                             */
/*                                                                       */
/* <Note>                                                                */
/*    Only horizontal layouts (left-to-right & right-to-left) are        */
/*    supported by this function.  Other layouts, or more sophisticated  */
/*    kernings are out of scope of this method (the basic driver         */
/*    interface is meant to be simple).                                  */
/*                                                                       */
/*    They can be implemented by format-specific interfaces.             */
/*                                                                       */
static FT_Error
Get_Kerning(T1_Face face,
            FT_UInt left_glyph,
            FT_UInt right_glyph,
            FT_Vector* kerning)
{
    kerning->x = 0;
    kerning->y = 0;

    if (face->afm_data)
        T1_Get_Kerning((AFM_FontInfo)face->afm_data,
                       left_glyph,
                       right_glyph,
                       kerning);

    return T1_Err_Ok;
}


#endif /* T1_CONFIG_OPTION_NO_AFM */


FT_CALLBACK_TABLE_DEF
const FT_Driver_ClassRec t1_driver_class =
{
    {
        FT_MODULE_FONT_DRIVER |
        FT_MODULE_DRIVER_SCALABLE |
        FT_MODULE_DRIVER_HAS_HINTER,

        sizeof(FT_DriverRec),

        "type1",
        0x10000L,
        0x20000L,

        0, /* format interface */

        (FT_Module_Constructor)T1_Driver_Init,
        (FT_Module_Destructor)T1_Driver_Done,
        (FT_Module_Requester)Get_Interface,
    },

    sizeof(T1_FaceRec),
    sizeof(T1_SizeRec),
    sizeof(T1_GlyphSlotRec),

    (FT_Face_InitFunc)T1_Face_Init,
    (FT_Face_DoneFunc)T1_Face_Done,
    (FT_Size_InitFunc)T1_Size_Init,
    (FT_Size_DoneFunc)T1_Size_Done,
    (FT_Slot_InitFunc)T1_GlyphSlot_Init,
    (FT_Slot_DoneFunc)T1_GlyphSlot_Done,

    #ifdef FT_CONFIG_OPTION_OLD_INTERNALS
    ft_stub_set_char_sizes,
    ft_stub_set_pixel_sizes,
    #endif
    (FT_Slot_LoadFunc)T1_Load_Glyph,

    #ifdef T1_CONFIG_OPTION_NO_AFM
        (FT_Face_GetKerningFunc)  0,
    (FT_Face_AttachFunc)0,
    #else
    (FT_Face_GetKerningFunc)Get_Kerning,
    (FT_Face_AttachFunc)T1_Read_Metrics,
    #endif
    (FT_Face_GetAdvancesFunc)T1_Get_Advances,
    (FT_Size_RequestFunc)T1_Size_Request,
    (FT_Size_SelectFunc)0
};


/* END */